'宣言 Public Overloads Sub DrawText( _ ByVal astrText() As String, _ ByVal text As RectangleF _ )
public void DrawText( string[] astrText, RectangleF text )
パラメータ
- astrText
- ページ上に描画するテキスト文字列の配列。
- text
- テキストの矩形範囲。
'宣言 Public Overloads Sub DrawText( _ ByVal astrText() As String, _ ByVal text As RectangleF _ )
public void DrawText( string[] astrText, RectangleF text )
private void arv_Load(object sender, System.EventArgs e) { rptDocument rpt = new rptDocument(); rpt.Run(); arv.Document=rpt.Document; System.Drawing.Font f = new System.Drawing.Font("Times New Roman", 36); string[] strArray = new string[5] {"A", "B", "C", "Sofware", "Company"}; arv.Document.Pages[0].ForeColor = System.Drawing.Color.YellowGreen; arv.Document.Pages[0].Font = f; arv.Document.Pages[0].TextAlignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center; arv.Document.Pages[0].TextAngle = 900; arv.Document.Pages[0].VerticalTextAlignment = GrapeCity.ActiveReports.Document.Section.VerticalTextAlignment.Middle; Single x = 1.0F; Single y = 1.0F; Single width = 6.5F; Single height = 9.0F; RectangleF drawRect = new RectangleF(x,y,width,height); arv.Document.Pages[0].DrawText(strArray, drawRect); }
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load Dim rpt As New rptDocument rpt.Run() arv.Document = rpt.Document Dim f As New System.Drawing.Font("Times New Roman", 36) Dim strArray() As String = New String(4) {"A", "B", "C", "Software", "Company"} Dim x As Single = 1.0F Dim y As Single = 1.0F Dim width As Single = 6.0F Dim height As Single = 9.0F Dim drawRect As New RectangleF(x, y, width, height) With arv.Document.Pages(0) .Font = f .ForeColor = System.Drawing.Color.YellowGreen .TextAlignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center .TextAngle = 900 .VerticalTextAlignment = GrapeCity.ActiveReports.Document.Section.VerticalTextAlignment.Middle .DrawText(strArray, drawRect) End With End Sub